
Partial Class Forms_MasterPage
    Inherits System.Web.UI.MasterPage

  Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    Try
      If Not IsPostBack Then
                lblMsg.Text = "Bienvenido: " & Tafi.Portal.UI.DisplayCommonFunctions.GetUserName(Me.Page)
                If Tafi.Portal.UI.DisplayCommonFunctions.GetSaldo(Me.Page) <> "" Then
                    lblSaldo.Text = " " & FormatNumber(Tafi.Portal.UI.DisplayCommonFunctions.GetSaldo(Me.Page), 2)
                End If


            End If
        Catch ex As Exception
            Throw ex
        Finally
        End Try
  End Sub

  Protected Sub LnkSalir_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LnkSalir.Click
    Response.Redirect("../Default.aspx")
  End Sub

  Protected Sub LnkSoli_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LnkSoli.Click
    Response.Redirect("../Forms/FrmMenuSolicitudes.aspx", False)
  End Sub

  Protected Sub LnkConsu_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LnkConsu.Click
        Response.Redirect("../Forms/FrmMainConsultas.aspx", False)
  End Sub

End Class

